home *** CD-ROM | disk | FTP | other *** search
- <title>Library Textures</title>
-
- <script language="EasyScript">
-
- ////////////////////
- function GetImages ()
- {
- if (sub_directory == "") return "";
-
- var buffer = "";
- file_path = getProgramDirectory() + "/library/textures/";
- file_array = getFileList (file_path + "*.*");
- file_array.sortStrings();
- for (m=0; m< file_array.count; m++){
- file_name = file_path + file_array[m];
- buffer += "<img toolbutton src='" + file_name + "' ";
- buffer += "onMouseUp=\"AddLibraryFile('" + file_name + "')\" title='" + file_array[m] + "'>";
- buffer += "<spacer width=15>";}
- return buffer;
- }
- /////////////////////////////////
- function AddLibraryFile (filename)
- {
- new_object = fileLoad (filename);
- window.returnValue (new_object);
- window.close ();
- }
- ////////////////
- function Close ()
- {
- window.close ();
- }
-
- </script>
-
- <body bgcolor="#FFFFFF" text="#000000" background="backgrounds\whitegrain.gif" translate>
- <div valign=middle>
-
- <img src='images/small_bullet_blue.bitmap'>Click to choose a texture
- <p><include value="GetImages()">
-
- <table cellspacing=0 cellpadding=0 width="100%">
- <tr><td align=right>
- <a button onMouseUp="Close()" width=+20 height=+2><img src="images/small_cancel.bitmap" hspace=4>Cancel</a>
- </table>
-
- <spacer height=4>
-